home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 April: Mac OS SDK / Dev.CD Apr 98 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / AIncludes / Scrap.a < prev    next >
Encoding:
Text File  |  1998-02-12  |  2.6 KB  |  100 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Scrap.a
  3. ;
  4. ;    Contains:    Scrap Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Release:    Universal Interfaces 3.1
  8. ;
  9. ;    Copyright:    © 1985-1998 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        Please include the the file and version information (from above) with
  12. ;                the problem description.  Developers belonging to one of the Apple
  13. ;                developer programs can submit bug reports to:
  14. ;
  15. ;                    devsupport@apple.com
  16. ;
  17. ;
  18.     IF &TYPE('__SCRAP__') = 'UNDEFINED' THEN
  19. __SCRAP__ SET 1
  20.  
  21.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  22.     include 'MacTypes.a'
  23.     ENDIF
  24.  
  25.  
  26. ;  _________________________________________________________________________________________________________
  27. ;   • CLASSIC SCRAP MANAGER API
  28. ;  _________________________________________________________________________________________________________
  29.  
  30.  
  31.  
  32. ScrapStuff                RECORD 0
  33. scrapSize                 ds.l    1                ; offset: $0 (0)
  34. scrapHandle                 ds.l    1                ; offset: $4 (4)
  35. scrapCount                 ds.w    1                ; offset: $8 (8)
  36. scrapState                 ds.w    1                ; offset: $A (10)
  37. scrapName                 ds.l    1                ; offset: $C (12)
  38. sizeof                     EQU *                    ; size:   $10 (16)
  39.                         ENDR
  40. ; typedef struct ScrapStuff *            PScrapStuff
  41.  
  42. ; typedef struct ScrapStuff *            ScrapStuffPtr
  43.  
  44. ;
  45. ; pascal ScrapStuffPtr InfoScrap(void )
  46. ;
  47.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  48.         _InfoScrap:    OPWORD    $A9F9
  49.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  50.         IMPORT_CFM_FUNCTION InfoScrap
  51.     ENDIF
  52.  
  53. ;
  54. ; pascal SInt32 UnloadScrap(void )
  55. ;
  56.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  57.         _UnloadScrap:    OPWORD    $A9FA
  58.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  59.         IMPORT_CFM_FUNCTION UnloadScrap
  60.     ENDIF
  61.  
  62. ;
  63. ; pascal SInt32 LoadScrap(void )
  64. ;
  65.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  66.         _LoadScrap:    OPWORD    $A9FB
  67.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  68.         IMPORT_CFM_FUNCTION LoadScrap
  69.     ENDIF
  70.  
  71. ;
  72. ; pascal SInt32 GetScrap(Handle hDest, ResType theType, SInt32 *offset)
  73. ;
  74.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  75.         _GetScrap:    OPWORD    $A9FD
  76.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  77.         IMPORT_CFM_FUNCTION GetScrap
  78.     ENDIF
  79.  
  80. ;
  81. ; pascal SInt32 ZeroScrap(void )
  82. ;
  83.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  84.         _ZeroScrap:    OPWORD    $A9FC
  85.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  86.         IMPORT_CFM_FUNCTION ZeroScrap
  87.     ENDIF
  88.  
  89. ;
  90. ; pascal SInt32 PutScrap(SInt32 length, ResType theType, const void *source)
  91. ;
  92.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  93.         _PutScrap:    OPWORD    $A9FE
  94.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  95.         IMPORT_CFM_FUNCTION PutScrap
  96.     ENDIF
  97.  
  98.     ENDIF ; __SCRAP__ 
  99.  
  100.